/*
 * Copyright (C) 2010-2018 Gordon Fraser, Andrea Arcuri and EvoSuite
 * contributors
 *
 * This file is part of EvoSuite.
 *
 * EvoSuite is free software: you can redistribute it and/or modify it
 * under the terms of the GNU Lesser General Public License as published
 * by the Free Software Foundation, either version 3.0 of the License, or
 * (at your option) any later version.
 *
 * EvoSuite is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 * Lesser Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with EvoSuite. If not, see <http://www.gnu.org/licenses/>.
 */
package org.evosuite.instrumentation.error;

import org.objectweb.asm.Opcodes;
import org.objectweb.asm.Type;

import java.util.Arrays;
import java.util.LinkedList;
import java.util.List;
import java.util.Map;

public class LinkedListInstrumentation extends ErrorBranchInstrumenter {

    private static final String LISTNAME = LinkedList.class.getCanonicalName().replace('.', '/');

    private final List<String> emptyListMethods = Arrays.asList("getFirst", "getLast", "removeFirst", "removeLast", "element", "pop");

    private final List<String> indexListMethods = Arrays.asList("get", "set", "add", "remove", "listIterator", "addAll");

    public LinkedListInstrumentation(ErrorConditionMethodAdapter mv) {
        super(mv);
    }

    @Override
    public void visitMethodInsn(int opcode, String owner, String name,
                                String desc, boolean itf) {

        if (owner.equals(LISTNAME)) {
            if (emptyListMethods.contains(name)) {
                // empty
                Map<Integer, Integer> tempVariables = getMethodCallee(desc);

                //tagBranchStart();
                mv.visitMethodInsn(Opcodes.INVOKEVIRTUAL, LISTNAME,
                        "isEmpty", "()Z", false);
                insertBranch(Opcodes.IFLE, "java/util/NoSuchElementException");
                //tagBranchEnd();
                restoreMethodParameters(tempVariables, desc);

            } else if (indexListMethods.contains(name)) {
                Type[] args = Type.getArgumentTypes(desc);
                if (args.length == 0)
                    return;
                if (!args[0].equals(Type.INT_TYPE))
                    return;

                Map<Integer, Integer> tempVariables = getMethodCallee(desc);
                tagBranchStart();
                mv.visitMethodInsn(Opcodes.INVOKEVIRTUAL, LISTNAME,
                        "size", "()I", false);

                // index >= size
                mv.loadLocal(tempVariables.get(0));
                insertBranch(Opcodes.IF_ICMPGT, "java/lang/IndexOutOfBoundsException");

                // index < 0
                mv.loadLocal(tempVariables.get(0));
                insertBranch(Opcodes.IFGE, "java/lang/IndexOutOfBoundsException");
                tagBranchEnd();

                restoreMethodParameters(tempVariables, desc);
            }
        }
    }


}
